home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Source Code / Visual Basic Source Code.iso / vbsource / flyout / mdiform1.frm < prev    next >
Text File  |  1995-05-02  |  967b  |  37 lines
  1. VERSION 2.00
  2. Begin MDIForm MDIForm1 
  3.    Caption         =   "Flyout Menu Demo"
  4.    ClientHeight    =   4380
  5.    ClientLeft      =   1095
  6.    ClientTop       =   1485
  7.    ClientWidth     =   5475
  8.    Height          =   4785
  9.    Left            =   1035
  10.    LinkTopic       =   "MDIForm1"
  11.    Top             =   1140
  12.    Width           =   5595
  13.    Begin SSPanel Panel 
  14.       Align           =   2  'Align Bottom
  15.       Alignment       =   1  'Left Justify - MIDDLE
  16.       BackColor       =   &H00C0C0C0&
  17.       BevelInner      =   1  'Inset
  18.       Font3D          =   1  'Raised w/light shading
  19.       ForeColor       =   &H00000000&
  20.       Height          =   360
  21.       Left            =   0
  22.       TabIndex        =   0
  23.       Top             =   4020
  24.       Width           =   5475
  25.    End
  26. End
  27. Option Explicit
  28.  
  29. Sub MDIForm_Load ()
  30.    Load frmToolbox
  31.    Call InitializeToolbox
  32.    Call ArrangeToolbox
  33.    frmToolbox.Show
  34.    Load frmFlyout
  35. End Sub
  36.  
  37.